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ABSTRACT 

PROBLEM TO BE SOLVED: To provide a common gateway interface (CGI) program 
preparing system with which the source of a CGI program for 
-eceiving/analyzing and processing an input character string and a hyper 
'text* mark-up language (HTRML) for output can be *separately 
jenerated/maintained and the execution performance of the generated CGI 
urogram can be made equal with that of an ordinary CGI program. 
SOLUTION: In this program preparing method, a translator 404 is prepared 
Eor translating a prepared *HTML* 402 to a program source for outputting 
-hat *HTML* and while using that translator, the *HTML* to be an output of 
-he CGI program is translated to a sub-program which can be called from the 
"Gl program for performing processing excepting for the output of *HTML 
such as receiving/analyzing and processing the input character string. 
Then the CGI program prepared *separately* from the sub -program for 
oerforming the processing excepting for the output of *HTML* such as 
receiving/analyzing and processing the input character string and the 
sub-program translating the *HTML* are generated as logically one program. 
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im&m i ] wwwt-^itifH-scG i rn/? 

^ffiffi£^^-&£a60f?ffj3:t«8£HTML£: LT 
iHTML^^ h^yXl—^CiO, I^HTMLfclal 
T&X7-yTb, 

co^m^o b b i>iz±MZ$ZMLtiTu7?J*V-x<7) 
7b ZffitKZ b ZmWLt-t& C G I rn/5Afftfc(i 

m. 

[IfcHR 2 ] wwwif-^_hTiWW-* C G I 
A£ffr£-t&CG I ra^7A#fig.*Stc:fc^-C. 

I£HTML£. h5>Xl'-^fcJ:9, |gHTML(C« 

y -xor a sraf u ta-r mtvRsnr ur? a y - 

ft-ft§-£T. — oc7>CGiru^5A££j£-r 
>/T k i: ^imb^S C G 1 7n/7 

AffrjfcfrS;. 

m?m3 ] IS^JS 1 £ fcfi 2 OM*U>* 1 ofclEi^r 
n^5AMMK«Sro/7A^|gttUukl# 

[00 0 1] 

»f^-r&cG i Tn^^^f^fiit^tcBg^-^. 

[0002] 

[&3fc^&lft] ifi^. WWW (Wo rid Wide 
We b ) ±X'(T>ftW3mrm$ili&&2>&ir')X'*>&. 
wwwtTvymxmKffimco^Kftmi. wwwt-A 

*<-zr bmftihF*r*.*>b&&m~$-2>zbi,zJ:K) 
fibtLZ,. *-J*^- : Jbl3.. HTML (HyperT 
ext Markup Language) b Bf If fl& 

mfiT'!e^$njt^xh7T-f/u--c-*>i). JUT- ht 

MLKL^tfoTlfi^fl/CT^Xh^-^S: r HTM 
Lj fcnf^tot-rs. wwwr^»7lf(i. SttBX-?/c 
HTMLJrISJfL, ^57 -f y'Jf^ri/ 

[00 0 3] J--ir(i. WWW77WIZWLX 
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*^iJ&k*oA:ft£fi^.r >Itf>%£\ WW 

^k'cOMS^L. *^S!UI<DMIII£^-fHTML$:W 
WWy^-7-rtjg-r. ±d&5!Uia<g;fc£iT.&. 
^id^S^^/j^LT. CGI (Commo 
n Gatewaylnterface) £f ljffl"^"^> .1 
btfiP^. 

[00 04] CGHS, WWWt-A'^^|,Hf-yN'7y 
io yJicovv-xbcoJ y?7i-^TjfeDs wwwt- 

^OfcOO^^^LT^I.. CGl£*lJfflLTW 

wwt-^- 1 fflfgJr-^ 0 b o -f s r r 'J ^ 3 yro 

^A£. CGITo^Afcud. CGITnOA 

##3tfflt : Wi 1 1 i am E. Weinman^ ®*ME£tR 19 9 7 
/\ A yruxmi r C G I 7 >y 9 j Ki¥ L < iEi£§ 

20 [000 5]aiC, MtLtCGl7'n/7AS' 
ffl Itf: 7 5 -i T V V b -9W n' fc cr>^ 0 JK 0 * ^"TliJfcE] 
WWW75>>fl 0 1frt>. CGI 70/7^ 
^fS^i: a.— Ttct 1 0 1 tA^)$n^tff 

18102 (^§*U^7*-Vy hiO^^IJiClfefctf)^ 
ixTV^) ££g{tBXofcWWWlf-;s*l 0 3fi, CG 
ITn^Al 04£@t!rr&. CGiru^AlO 
4ti. WWW+r-Al 0 3*>£>ig$ft.*:tif#8l 0 5 (JL 
— TA^fgl 0 2,t|alt) S?7C(£«!a*tfVV HTM 
LI 06Srai^)-r^. WWWt-Al0 3li, tB^OH 

30 TML 1 06^10, WW/^^ftCHTMLl 
0 7 (HTML1 06k|Slt) ^T&^th. 

[ 0 0 0 6 ] cg i rc?^5A<iiis, mr<o ( 1 ) — 

(3) coJiO^Hmirffo. 

( 1 ) WWW-^-^-A^^tBXofc^^JO^ 
WWW!7*^m±. jl— tf3&*A*tfcfll«=fir4r*. M» 
n-Ktrf+JnrS^k'LT lmX^Hzt bfrX. W 

^iiCGirQ/7A(;lt^. CGl7'n/7A 

40 l . jl— t^'Ati LfcflMtesaft-r & . 

( 2 ) jl— r«0A7J(3|Et^«^ 

x^izmmLfzt&MJL-^coxtimnftmttytzMz 

"Tom" b^omA&ZAJlLfcmG. Tomtw^-r 

zmmt 7-?<-xfrb&mt&%b'<D>&m£'ij? . 

( 3 ) HTMLitJT} 
±ffi (2) 0*!!SKJfctfcHTML£tti?l-f 

±ie^0lJT-Tom<O{iA«$S^«ISgL-C#^^ 
IZ. Z<rmAfiffl$&*rt-^£olzmm.LtzHTMLb 
50 LTffi^-r^^k'Tft^. 
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[00 0 7] -JRK, HTML<Dffi7Jg1tfH4. CGI7 

mzmfrhtLtiffimzzz. m2iz, cobolcj:s 

CG I ro^7A<^HTMLdi^Sf5^3-K0ij2 0 1 
$r^-f. d<7)n-K0i|2O 1 fc*Jlv£\ "IDENTI 
FICATION DIVISION" <7)fffcJ:i;f(0 

"PROGRAM- I D" Offti, £ffibirC& 
^.^"ENVIRONMENT DIVISIO 
N" cOfKilSWfll-C* 0 . **XJW> "DATA D I V 
I S I O N" 'ijfrt>cr>m?tM±T-?1$~C$> 0 , "PR 
OCEDURE DIVISION" tf^C«7'07' 

"end" ffmt-Twmm -c* 

T. HTMLSrBWrJ'iOJcfflVvtU*. ,UtA>#S«i 

c o b o L<9ft&-eiES&$*vr t^s . 
[0008] £tf>3— KM 2 0 i tf^^asa&a+ST 
14, I FSTC3BR I # "4 " <fc 9** ^jW»»tflJM 

iro^ATtt. ^frKi-^-CtBTrr&HTMLS:^ 

[0009] VXkWMLtzC G I rn^5AfcU4JaT<0 

( 1 ) - ( 3 ) <3J: 3*ISIHjS0*aS. 

( 1 ) CGirnma-HtU, 02<?)r?-K09 

t^oTieifiL^tmtfSr^^rV^ ZilitCG I To 
fyJ^iEfomizb ^Ximt,zb?t,i>L^imT'h&. 

(2) aJ2J-r&HTML£r^5SL*:V-x*§-£\ HTMLSr 
ajMl.fllW ! CGiro/7A3-H[*ltMt4; 
fcfc#lr HTMLOWWW^9?lF(CJ:4ai*tf>' 

(3) HTML£aj;tj-r6gB#£l£iEL*l'>*§^\ $>£ 
<^14H TM L £&tthim<?>&ttZBiELfc^t%i!<V> 
b'*?^lZto^Xi>. HtCGI7D/7A3-h« 
tfiZmizZ&ZtfrC CGI/n/^An-HKAT' 

[ooio] z<r)tz#>. cg iro^Afftfct;:*^ 

^M$&^*&JI£fi : '3S5#i: >CGI 7*0^5 A#ffl 
7rfSHTML<oS5#i:£. Bf«(cM-fi^rC««9l 

[ooii] zco^d^mm^mmt^j^atmtL 

X. H3^^*^ S±«Powc rCOB 

OL97 COBOL r C G I *?~f}V — -f" V 1. 0 

^HTML^ffi^lO^O^ia^^T^CG iro/^AiO 
V-X3 0 1t, aMjffl<9HTML30 2fc£, Sfl*K 
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£HTMLK^$-?-&&fcKOHTMLflsj£fflXf f a 9 3 

o 3 &mm u htm Lf^fig^ «rg«i-rs i t 

CGI TD/7A<0V-A3 0 1 St^WsM/PLT 
MS^CGI7D^7A3 0 4li. Htf^CHTM 
L 3 0 2 Sr^iiAT-ai^-rS . £<?Xfr3ttfi: , ATI* 

OSIM^ffaCG I ro^7A^y-Xi:aitJfflOHT 
M L b £8iJ * • &3r-Th ■! fc . iiao^H 

10 [0012] 

&K(4&TOj: d^rWHjSW*** . "«r*>t», CG I r 

nry^vmm- &mz 

( 1 ) CG I7D/7^A { HTML5rI^ 

( 2 ) H^&A^HTMLSrtBTj U WWWf-^g* 

twww7 5 ^iftc^-r h 

b\.->dWmt:ftdK:tb. MftcDCG I Tvfy&btm 

lt, < i > <?>HTMLm?>-&?>-nftmftmm&M<% 
zk\^mm&tfmft>tih. -hrwiccgi -rur? 

20 M$WWW7'7^frh<?M3i&lzmf ■ ^7t5«»« 
Xt> K> , Hfif^^^tcll^-r S«koWJ^-x 
3 W4 . HTML ^gg^jX^JttS^^ft^tT 

^n^cihtc^rl.^, ^7^7>-Koi/^yx^ 

[0013] *o*:#>. A***W<05W* - SSifrfcitf 
•e^«SmSr7Ct=ai7J^$iIfflI^i:<7)it5aSrfiro CG I To 
^^ACOy-^taJTJffl^HTMLtS-giHitC^fig • « 

^SftSCGiro^^iiifiHfiig 
#3I*<0C GI7a/7At IWc&S 43^CGI7 

[0014] ^Hfl«osw{4, A7j^?ijco^# - mm 
&£V*<r>m&*Kiz&xmmti:z<?>vm*fto c g 

1 7n ^7 a<o y b liijjm?) H T M L b 2-»iJffl^ 
ifeJfcSftSCGIT-a^AOll 
ffttfe5<»CGI ra^AfclSI^^a J; d^C 
G 1 7n^ 9Affrtt&iS*5BKr £ fcfc S . 
[00 15] 

mxmiizi&zftBm^ wwwt-^'iTu#t5 

40 CGI7o/5AJMnCG I7D/7^MM 
KiHvt, ^M®$r^^-S^i6c0il!s^ftlg^HT 
MLtLT^^^t^^-r^X^^ri:, IgHTML 
h^yxix-rJ'tC.tO, ISHTMLi:|Bl^^<-~/o 

rt. IMILfcru^Ay-xfc. tB7JO»^*"I 
^t'^a^fi 1 ^ t i>t±ie^BIL*:7-o^Ay 

bi—fttt.Z-£X. — ^CGI7n^ASr4tfS 
Xf77t «rfif ^.^Cl h *&WLb^&. 
50 [0016] |fi^«2 fcHS*^KH(4, WWWt-^lt 



5 

mft-th C G I A£ffr£-T6 C G I 7n/7A 

S«fcJ:Vl|iJ««*«r*Ta3fi^^«:ifALT, HTM 
Lb LXfohfrK,W$fcthXT-/?t. iHTML 

7b, iliUrn^AV-XJ:, U3?8ll^rn 

[00 1 7] «**3K:«R*IKWi. M*JHlifc«i2 
[00 18] 

imiemwmm kit, Hfls*jflwt. 

t, rn/?5y/iiCOBOLSrttfflLfcrn/9 

[ 0.0 1 9 ] 04 iz, *f6BH<0Htt<WBJ||«)»|fiH** 

*SM?:7c(:{l5^$iJffli'Sri:'$rfi : acG I 7u7?J*(OV 
-X4 0 1 tai*ffl^HTML4 0 2 i: £a6a»t#>f£ 
UW4k: * £T-(i±i£<O0 3 eD&*n<0#& fc RT t-ca 
£. HTML4 0 2ti, pfifiM X-y4^HTMLt^ 
& <fc 3 Sr&fcJOHTM LfPBgfflx-r -f ? 4 0 3 

<± s HTML 4 0 2$rHTML£fJ7JfflCG I 7D^5A 
V— X4 0 5t38(W-4. C«b5^V- ?4 0 4tc 
<t 0 . 0 5 {4. 7Jl3&9i0&it - 

»wfe«tif *<oifi*s:7cfc:asA<«w«*ir*ff d c g i 

7D/5A4 0 1 7&^iiff r JUSit-2>-9-7'rc7^'7Afc L 
ym%'fio7n7^KA 0 1 fc. h7^W;4 04 

— -><07*n^7A4 0 6t^r^. -TOidC HTML 

tfitwtm/? s v^mii(c^m$ii-cc g i ro 
* r ?Art(3i#>&£*v?. ia2oa^<7)CGirn^7 

A20 1 kR*tClWW-fty-^4 0 6jW^jRS*l.*. 
4;l<LfeJtfflB3S«>CGI rn/5A(i s 4 0 7t^t 

[0020]i5t, h7>^l'-^4 0 4«i)ff^ 

1. HTMLWr^/P^lrjctrL^Q^A*^ 
fig 
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2. HTML£gg*&^ ffi^fll^tC^ft 
b^o$m*'tro. 

[002 1] ^f775 0 lT^,aiLlfP (IDE 

NT I F I CAT ION D I V I S I ON ) Sr^r-f 
COBOL-CiiJltULSBlcm^A^ 

(PROGRAM- ID) Sriffi4L*ttWf=flr6*lf^ 
-I-lffi, 7o/7A*t LTHTMLcO^r-f/^Sr 

A7jx^«j^# • mm&its* 

(Om&ZmziiiXcofflfflftb'Z'fTd CG I 7D/7A 
10 (4. .Icoro^A^ClioT, ClOCGiru^A 

502). -e^. HTML^flmfifT'^IXO. 
Srtt^-rSD I SPLAYS (COBOLCO^iii^ 
X) iZ^&L. 7r^;Utttl^-rS. d^SSr. HT 
MLyrJ Jl<(r>ffi£mizm^<tX'Wi r )MLfio (* 
T77503) . mm. Tn7yJ±mT<7)mX£yr 
-f/HCfctSTJ-r^ (Xf'y7504) . liLkH**)* HT 
20 ML7 7-fW^> -e<7)HTML$rai7J-ri)7'0^9A 

v—xnm t>titiz b\,z+£h. 

[0022] 06^09 S#JHLT, *3I*?5JB!HW> 
IHNRi£RW£. 06 CO 6 0 i azxft> 0 

2<7)2-?<0HTML£. jl— f j^cOATJKJStT^ 

[00 23] 06c7)CG I ra^^A^ff,^^ ^ 

-S/6 0 1 i: 6 0 2 Sr^DOHTM LffrjJlfflXTW 
#f£-t£. CGI7D/7A(i. i-if^oATJfclE 
tTtHTM ^-y60 1 k 6 0 2C0iffe^.*>Sr^-rS 
30 fcUoJittSSr, Pmr#oFLGk^:7 7:^£fc7)ffi 

v*£*i\ fHi*f-^i§-£-lci4F LG = l s isn&X-b^tz 
C>FLG=2b^oJ:ol,zm$ZZtl&. HtflU—iS6 
0 H4CG I 7o/ 7 ArttF LG= 1 cOiS^fcmTj £ 
*U aiT^-f ^-^'6 0 2{iFLG^lJ^hO^{CHJ* 

[0 0 24 107*4, 060^73^^-^*6 0 ltJitX 
6 0 2£*jir$-SHTML-e&!>. 06tf>BSff>f*— : J 
£&*n<7)HTMLffr£fflXx -f ?Tffr£L, 07OHT 

40 MLK38fc-fS WWW77>)f* { HTM 
L7 0 lfclH^LfcSSUL ffiTM ^'6 0 lj&'fUnS 
WWW75WHTML7 0 2£j»«?L 
fclfi*, aj7 t J^^-^'6 0 2*'^$il^„ 
[0025] 08iC. HTMLA«h7yXl/-^CJ:o 
TS«$feCG I 7D/7A(OM*«M + rit. 8 0 
K4HTML7 0 ltfb7>'Xl—?l l z£-oX$mZtL 
fcCOBOLV-XO&mOfflT'&'K 8 0 2J4HTM 
L 7 0 2 A* h 9 >XV— ? H«t o T ^&£*ut C O B O 
LV— Z.<7)&m<7MX'$>&. m5<DXr- yy"50 l<7)%k 

50 SteiO, HTML7 0 107r^;^ (MALE, h 
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tml ) A^7D/5A*i«M?nt^S (80 
3) . £tz, X^yT5O3^)iHmizX'0. HTML 7 
0 1 <r>ft®l)K C O B O LC9®'3itfi}J}f;SrC#> 5DIS 
PLAY^Z^m^tlX^ (804) . hyyXU— 
^tCtD. HTML70 2#COBOLV — X 8 0 2 tC 

[00 2 6] 09 08^rD^7A$rDft/ai-rCG 
I7D^7AV- X«W*S5t. COBOLV— X9 0 
lT'Ji. 75^FLG#1 W^lCfcL HTML 7 0 1 

Sraj^-ri.- , f7'ra^'7AMALE8o ls-of^-r 

(902) . t77n/7A«MALE«, HTML7 

COBOL7-X90 ltli, 77/FLG 
*SHW«0i|#(:li> HTML7 0 25raj?J-rSirrr 
o^5AFEMALE8 0 2$rD?D f it}-r (903) „ 8 

0 1, 8 0 2i3<fct/9 0 1<7)3-P<0CG I y— Xtiffcil 

aw-— ocdcg 1 to^-a-c^ o . — mmftmny 

r -i Mz a yj U )V~th n t tfX'% h . 

i o o 2 7 ] mz. *mi<r)f&2<7)%m<nmm,zmm- 

HTMLJffllUV^. — #. HTMLfcjSSR^WW 
8ti§£5jcrHTM Lcr>{±miZ%^$iM7 7ZWA-th i 
fcfc«fcr>T, -o^HTMLTS&WSrffi^O^H^IB 
-tS<fco&¥&##gl£*l.T^.i>. Cl<0HTMLtJ£3i 

Sc&m 1 997/4SOFTBANKlff r We bT 

ALfcHTML (WT. fi£§gHTMLfcDp^:) £{£fflL 
^%^<0»)^J^^t-. %BJi^fiJt0li04 2:n^'e£> 
4 0 2KflrrHTML#&3g£frO 4 

04«h7yx c tiiztt m lx nm^ixx v > s 

[00 28] HTML(Ci¥A^SIfc31:?^i: UTte^ S£ 

• I F— ELSE— END I F (7>0£1til) 

• RE PEAT — END RE PEAT ( < OML^jt) 

[00 2 9] 121 OJi. B6*>tltt!<f 
attHHTML4>ff-C&&. $%IF%$, $%ELS 
E%$, $%END- I F%$h^a, g&rftt&COfflffl 

mmzm^fT'tfHTMuzftAznx^z, (100 

1 ) . uOHTMLIl tt^ro^AKi-JtffilS 
*Utfc#iC, FLG<^B#lT£>6*§£-(::«:06fiD6O 
1C0J: "ma 1 e" " I 'm a 

man" fcV*3:fc*3l£tittrf-6HTMLfc LTMtt 
U fl Gcrmtf l T5:^*§£-fcUi:06 O 6 0 2 fc Pffli 

IZ "f ema 1 e" b^ofJ hJl-X' " I 'm aw 
oman" i:^?;*miJ£ai7rr£HTML4: LT«8fg 
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<M&%zmziiit><?fflw%t'Z'u a cg 1 7n/7^w 

[00301 01 lfc. El 0£&56HTMLffll;:i£$g 
Lfch^XI^-^tcJ^T^SILfcCG I TafJJ* 
Sr^-f. fc^Lfch^y^-^TfJ:. 01 0<0HTM 

l kj$ a $ iir v ^&3§? ?ftx-mm $ *rc 7 9 ^ 

FLG1002 ^-^l^fct L-C^tSXI> «fc d 

& (110 1). £tz. b?>X]s-flt. 0 
10 1 0O1 0 0 KDfflfflffiMZ. 01 1<7)1 1 02OJ:3 

[0 03 1 ] 01 2tc, 01 l(7)7'a^^A$r0ftXai-r 
CGlTo^Ay-x<DfRI£*-f. FLG£3l!&i:L 
T0.1 lcoro7'7ASrOf^ajLT^S (1201) . 

[0 03 2] 01 li:01 2020<7)CGI y-^{if& 

[0 03 3] 01 3tC, t£5BHTMLffl<50h7>XU— 
?<r#m)Jtt7Kt. niTML^ -fllf^JR&j fc<r 

20 *>ikxim5<?)mi<7)m}>kcr>BBtmtx*&&. htm 
^t^mm-th. tm?7X'%^bti&. mstmmiz 

D I SPLAY#£m;WUf J:V\ SE§S^^«iaiL 

Girnj/^Atc^-rs. im?7$%iF 
%$^ajL^t#tc{±, I F^;5raj73L (^-r-y 7° 1 
30 1) . tm?7$%l F%$£$&tb-f.S.4T. HT 
MLS— ^TM^lXr>-C (Xf'/Tl 30 3) , %$EL 
SE$%^^ELSESr£fi7jL, Z O X'WltllXWi&JR 
30 o^HTMLSritiTJ^SD I SPLAY^aiTj^^^ 

i(^f-y7i304) *M*)m-. mMm.?y<r>i& 

3tc^^5-fi£5fiL^HTMLtc*fLTt>, -eo^^tc^ 
fS-T^CG I 7*C7^7Ay-X$:^-r^^Sr^a'r 
s;ttCGi7D/7Ay-x{:^ti<:i)Hi 

[0034] iSLhcoi d \z LX . *^C0BWS ^BStt- 
Srf^J^-T -& ^1 i: . 

[ 0 0 3 5 ] Srlo, ^ Cl'Cii^C O B O LBliTC G 
ITa^5A^^-rS(5IJ^^L^\ HTML^fi£5I 
HTM L $rfl!iaiicoy -XtC^i^-^ N =7 VX V— 9 & 
fflSf -S 3 1 J: 0 . c sfg^c + +wm% t' cnamw. 

my°x=>y? $ yrwmizM tx i>*mu7)mmi±*smx' 

[0036] 

50 CGI7o ?JJ*1ffiJLmz& \, ^X . A^^JOgtt 



• mm&xvvmz ftocG i -ruy^^v-xbia 

btfiX'**. 

1131 3 C G I ra^A<9iM££*i-fftJ£H 
[02] CGITa^AOHTMLa57J3-K0i£^ 

-m 

[H3 ] cg i rn^Afm<^k»^££^-f0 
[H4 ] m i osgjfecTMuott j£0 

[06] f^BJt-r^cGira^AT'tti^-rsBii-f^ 

[07] mm* j-^m-rHTMLnm^rtm 

[08] HTML*»ii>^L^CGl7-n^7AcO0ilJSr 

[09] HTML^^^L^CGira^A^DfZ/ 
aj-rrn^7AC7)0iJ5r^-r0 

[0io] a^^-^'s-a-r^ssHTML^i^^ 
0 

[01 1 ] HmHTML^^mLtcCGlTa^^M. 
[01 2] J£5iHTML*^^L^CGl7"n^7i>. 
[01 3] |tf3gHTML£CGI^c?^A{=^8H-S 



( 6 ) ItBfl^ 1 1-237976 

1 0 

1 0 1-WWW:t^-9\ 1 0 2-OL-- TA^WHi. 1 
0 3 -WWWt- v\\ 1 0 4- -CG 17*0/5^, 10 
5-JL-ifA*ffi$g. 10 6-HTML7T^;k 10 
7-HTML7t4j\s. 2 0 l-HTMLaj^l^-H. 

30 i -Ajimm- immv-x ? r-f/K 302-H 

TML7T-f;k 3 0 3-HTMLMfflif-f^, 3 
04-CGirn/7A, 4 0 1 -ATjBftff -ftJUNfflV 
-X7r-(;k 402-HTML7r^k 403-H 
TMLMfflXf^. 4 04-h7yXl/-^. 40 
10 5---HTMLifi7jfflV-.X7T>OK 406-CGI7 
a77jUV-X, 4 0 7-CGI7D7'7A||ffl^ffi 
fig, 5 0 1- -jLtULS^T^/UajTDak 5 0 2-S^gB 
• x-^gp • ««SP7r-f^£li73gE. 5 03- HTML 
£M- yr-{)Utii^. 5 0 4-ra^'5A^01.ai 

t^r-om^g^ 6 o l'-ww^^-raiTi-M- 

y, 6 0 2-WWW7'^'7-!fai73-f^-^\ 70 1-H 
TML3-K, 702-HTML3-K, 801— HT 
MLtraTj^SCGI rn^AV-X. 8 0 2-HT 
ML£ffi?rr6CG I 7*n/7Ay-X, 8 0 3-7n 
20 8 0 4-CGI70^7^V-X4'i7)HTM 

LtfJTjgfcJh 9 0 l-A73fH*ff -WWfflV-X. 90 2 

-htmlj: o^msit^cG i my^^mf&L 

9 0 3-HTMLj;0^$ixfcCGl7 o n^7A 

nytxmL-gji. iooi •• ©jffli^a-rtfcsg^^j. i o o 

1 1 o i-imzm-im 

9y<?y$mm. 1 1 o 

1 20 l-fc£5SHTMLJ:0^8i$ix^CGiro 



[03] 



[09] 



KTNLfWUB 



=J>/<-<Ar 



I 



CGI yo&vJ* 



4 



HTML 



WWW ♦-I*** HTML 



M«npr,cbl 






OemiRCATlON DIVISION. 
PROGRAM-ID. majnprojrar 
ENVIRONMENT 0WI8»CN. 
DATA DIVISION. 
WQRKIKMTORAGE SECTION. 
01 FLGPfCft. 
LINKAGE SECTION. 
PROCEDURE DIVISION. 


n. 




IF(R.O=1) 

CALL HALE' " 

ELSE 

CAUL "FEMALE 


002 




END-IF 

END PROGRAM cnaJnprognUTU 


003 





(7) 



&ffl¥ 11-237976 



mi] 




cgi ztny^M. 



[Hi 2] 



IDENTIFICATION DIVISION. 




PROG RAW-ID. MahpnjgrwrtZ. 




ENV: RODENT OVISIOK 




DATA 0IVI810N. 




WORK. NO-STORAGE SECTION. 




01 FLO PIC 0 




LINKAGE SECTION. 




PROCEDURE DIVISION 






1201 


CALLIFSAIf USMQ R.G " 




END PHOGRAM irahprogram2. 





I 

I 



(8) 



ftfflW- 11-23797 



[02] 



[124] 



IDENTIFICATION DIVISION. 
PROGRAM-ID. man program. 

ENVIRONMENT DIVISION. 
DATA DIVISION. 
WORKJNaSTORAGE SECTION. 
01 FU3 PTC 0. 
UNKAGE SECTION. 
PROCEDURE DIVISION. 



DISPLAY '<KTML>' 

DISPLAY VhEAO* 

DISPLAY ^TLETOto^mTLEV 

01SPLAY*<mEADV 

DISPLAY <800Yv 

DISPLAY '<8R>' 

DISPLAY '<H1>* 

WITH NO ADVANCING 
PERFORM VARYING I FROM 1 BY 1 UNTIL t>10 
DISPLAY 1 WITH NO ADVANCING 
D4SPLAY -«/Hl>- 
IFI»4 

DISPLAY '<H3>- 
DISPLAY "more than 4." 
DISPLAY *-</H3>" 
ELSE 

DISPLAY -<H2>* 

DISPLAY less than 3 <JKZ>' 

DfSPLAY'<H2>' 



DISPLAY •<8R>' 
DISPLAY '<jBOOY>' 
DISPLAY '^HTMLV ' 

END PROGRAM malnpreflram. 



HTMHWUH 



406 I I 

1 ^-401 I ^—405 

CGi ^g yHV-^ ■ ^ 



HTMLtt*f8 



3 



cGi^n^i* 



WWW HTML * ttifc 



[126] 



[08] 



I'm a man. 



I'm a woman. 



lOENTlRCATION DIVISION. 

PROGRAM-ID. MALE. 

ENVIRONMENT DIVI8ION. 
DATA DIVISION. 



803 



WORKING-STORAGE SECTION. 
LINKAGE SECTION. 

PROCEDURE DIVISION USING SY REFERENCE OGJ-ARGUMENT-UST. 



DISPLAY 'OfTML^ 

0 ISP LAY *<H=AD>' 

DISPLAY *<TTTl£>tTWlo</TlfLE>' 

DISPLAY *<JHEAD>' 

DISPLAY ^SOOYV 

DISPLAY , «SR>' 

DISPLAY '<H1 AUGN^c«nter>r 

WITH NO ADVANCING 
DISPLAY I'm « mmn.<M1> m 
DISPLAY <8R>' 
DISPLAY <<raODY>' 
DISPLAY '</KTMLV 
EXIT PROGRAM! 
END PROGRAM MALE. 



IDENTIFICATION DIVI8ION. 
PROGRAM-OX FEMALE 
ENVIRONMENT DIVISION. 
DATA DIVISION 
WORKING-STORAGE SECTION 
UNKAGE SECTION 

PROCEDURE DIVISION USING BY REFERENCE CG (-ARGUMENT-LIST. 
FORM-BEGIN. 

DISPLAY <«HTML>' 

DISPLAY *<4EAD>' 

DISPLAY *<nTLE»1fcfflaJ»<TITLE>' . 

DISPLAY '<H£AO>' 

DISPLAY «BOOYV 

DISPLAY ^8R>* 

DISPLAY *<H1 ALK3N^eenter>r 

WfTH NO ADVANCING 
DISPLAY Tm m * 
DISPLAY <<SRV 
DISPLAY ^BOOYV 



EXTT PROGRAM. 



(9) 



[05] 



nffl*?- 11-237976 



HTMLflJ771'JU«*^n^7A€tL, 



501 



502 



wwss • t — £§t • aware? r-r A.** 



ITML77<^7ST^ 



503 



i tz HTML $ ili r 6 DISPLAY JtS77-(;HliA 



0 











504 — 1 



[0103 



IFSAM.KTU. 



<HTML> 
<HEAD> 

<TrruE> 

5%!F ( FLG a 1 )%$ 

mate 
$%ELSE%S 

female 

<mTLE> 
</HEAD> 
<BOOY> 
<BR> 

<H1 AUGN=*cent«r> 
$%B= ( FLG • 1 )%$ 

I'm a man. 
$%ELSE%S 

I'm a women. 
$%ENCMF%$ 
</H1> 
<BR> 
<BODY> 
</HTML> 



(10) 



^m^- 11-237976 



[07] 



[11] 



<HTML> 
<HEAO> 

^TTTLE>nnale<n7TLE> 

</HEAD> 

<BODY> 

<BR> 

<H1 ALIGN="cerrter>rm a man.</Hl> 

<8R> 

<BOOY> 

<JHXML> 



^ — 701 



<HTML> 
<HEAO> 

<T1TLE>femalo</TrrLE> 

</HEAI> 

<BODY> 

<BR> 

<H1 AUGN="center">l'rn awomaa</H1> 

<BR> 

</BODY> 

</htwl> 



tOGKTHHCATION DIVISION. 

PROGRAM4D. IfSAM. 

EMVIHOtWENT DIVISION. 

DATA DIVISION. 



01 FIG PIC 89(9) 

procedure 0ivbiom 
using flq: 

OISPLAY'<HTML>' 
DISPLAY VHEAO^ 
DISPLAY <<TnLE>* 
IF ( FLQ si) 

DISPLAY 'malf 
ELSE 

DISPLAY tamata' 
END-tF 
DISPLAY '</ffTL£>' 
DISPLAY ^HEADV 
DISPLAY ^©OOY>' 
DISPLAY '^Ry 
DISPLAY 'OHI AUQN^«rt€r* 

F ( FLO =1) 

DISPLAY • I'm a man." 
ELSE 

DISPLAY ■ I'm a 
»0-IP 

DISPLAY y/Hl>* 
OtSPLAY vcflRV 
DISPLAY V30DY>* 
DISPLAY ■<HIHL>' 
EXIT PROGRAM. 
END PROGRAM IF SAM. 




(11) 



1-237976 



CHI 3] 



1 



T 




$%REPEAT%$ 



S&^fco& HTML £ 
DISPLAY 



PERFORM 

|$%END-REPEAT%$ 
i 



$%IF%$ 



*1301 



|$%END-IF%$^a 



v 1302 



HTML£-frS<*IX£ 



3S<?*3Xo*l HTML ££21^5 
DlSPUWXS^Wrt^a 




1303 



3 



HTML £fcB*-r « 
DISPLAY X&VT* )\,ta1l 



T 





ELSE $ 







1 



1304 



" I 



3 



c^T^vxu— »«7^> 



